Applying the steps learnt in part three on the search experiment:

EyEduGetExamples(experiment.type = "search")
## [1] TRUE
raw.data.path <- paste(getwd(),"/exampleDataSearchExperiment-master/", sep = "")
EyEduImportEyetribeData()
## [1] "Importing file: Danvers.tsv - number 1 out of 6"
## [1] "Importing file: Jones.tsv - number 2 out of 6"
## [1] "Importing file: Maximov.tsv - number 3 out of 6"
## [1] "Importing file: Parker.tsv - number 4 out of 6"
## [1] "Importing file: Prince.tsv - number 5 out of 6"
## [1] "Importing file: Raven.tsv - number 6 out of 6"
## [1] "Done!"

Plotting a single trial:

EyEduPlotTrial(participant.nr = 1, 
               trial.nr = 1)

Applying a filter and plotting the same trial with filtered data:

EyEduLowPassFilter()
## [1] "Low-pass filtering:  Danvers.tsv - number 1 out of 6"
## [1] "Low-pass filtering:  Jones.tsv - number 2 out of 6"
## [1] "Low-pass filtering:  Maximov.tsv - number 3 out of 6"
## [1] "Low-pass filtering:  Parker.tsv - number 4 out of 6"
## [1] "Low-pass filtering:  Prince.tsv - number 5 out of 6"
## [1] "Low-pass filtering:  Raven.tsv - number 6 out of 6"
EyEduPlotTrial(participant.nr = 1, 
               trial.nr = 1,
               show.filtered = TRUE)

Looks much less squiggly now :P

Detect fixations:
Now plotting a different trial to keep things from geting boring.

EyEduDetectFixationsIDT(dispersion.var = 90,duration.var = 6,use.filtered = F)
## [1] "Fixation detection for: Danvers.tsv - number 1 out of 6"
## [1] "Fixation detection for: Jones.tsv - number 2 out of 6"
## [1] "Fixation detection for: Maximov.tsv - number 3 out of 6"
## [1] "Fixation detection for: Parker.tsv - number 4 out of 6"
## [1] "Fixation detection for: Prince.tsv - number 5 out of 6"
## [1] "Fixation detection for: Raven.tsv - number 6 out of 6"
## [1] "Done!"
EyEduPlotTrial(participant.nr = 1, 
               trial.nr = 3)

Now, checking whether fixation detection was succesful on different trials:

EyEduPlotDiagnostics(participant.nr = 1,
                     trial.nr = 1,sample.length = 2500, show.filtered = F)

EyEduPlotDiagnostics(participant.nr = 1,
                     trial.nr = 2,sample.length = 2500, show.filtered = F)

EyEduPlotDiagnostics(participant.nr = 1,
                     trial.nr = 3,sample.length = 2500, show.filtered = F)

Visually, it seems like the detection didnt work quite as well for this participant. Lets check out another participant:

EyEduPlotDiagnostics(participant.nr = 4,
                     trial.nr = 1,sample.length = 2500, show.filtered = F)

Not great either, but maybe a bit better than for participant 1?

Plotting AOIs:

EyEduImportAoIs(append.aois = FALSE,
                delete.existing.aois = TRUE ,
                screen.align.x = 1024,
                screen.align.y = 768)
## [1] "Importing aoi file:  C_104CON.txt - number 1 out of 20"
## [1] "Importing aoi file:  C_104INCON.txt - number 2 out of 20"
## [1] "Importing aoi file:  C_10CON.txt - number 3 out of 20"
## [1] "Importing aoi file:  C_10INCON.txt - number 4 out of 20"
## [1] "Importing aoi file:  C_120CON.txt - number 5 out of 20"
## [1] "Importing aoi file:  C_120INCON.txt - number 6 out of 20"
## [1] "Importing aoi file:  C_12CON.txt - number 7 out of 20"
## [1] "Importing aoi file:  C_12INCON.txt - number 8 out of 20"
## [1] "Importing aoi file:  C_20CON.txt - number 9 out of 20"
## [1] "Importing aoi file:  C_20INCON.txt - number 10 out of 20"
## [1] "Importing aoi file:  C_43CON.txt - number 11 out of 20"
## [1] "Importing aoi file:  C_43INCON.txt - number 12 out of 20"
## [1] "Importing aoi file:  C_4CON.txt - number 13 out of 20"
## [1] "Importing aoi file:  C_4INCON.txt - number 14 out of 20"
## [1] "Importing aoi file:  C_62CON.txt - number 15 out of 20"
## [1] "Importing aoi file:  C_62INCON.txt - number 16 out of 20"
## [1] "Importing aoi file:  C_68CON.txt - number 17 out of 20"
## [1] "Importing aoi file:  C_68INCON.txt - number 18 out of 20"
## [1] "Importing aoi file:  C_92CON.txt - number 19 out of 20"
## [1] "Importing aoi file:  C_92INCON.txt - number 20 out of 20"
EyEduAssignFixationsAois()
## [1] "Assigning fixations to AoIs for participant:  Danvers.tsv - number 1 out of 6"
## [1] "Assigning fixations to AoIs for participant:  Jones.tsv - number 2 out of 6"
## [1] "Assigning fixations to AoIs for participant:  Maximov.tsv - number 3 out of 6"
## [1] "Assigning fixations to AoIs for participant:  Parker.tsv - number 4 out of 6"
## [1] "Assigning fixations to AoIs for participant:  Prince.tsv - number 5 out of 6"
## [1] "Assigning fixations to AoIs for participant:  Raven.tsv - number 6 out of 6"
## [1] "Done!"
EyEduPlotTrial(participant.nr = 1, 
               trial.nr = 3,
               fix.color = "green",
               show.filtered = FALSE,
               aoi.color = "black")

Get fixation summary:

EyEduGetFixationSummary()
load("exampleDataSearchExperiment-master/fixation_summary.Rda")
fixation.summary[100:109,]
##     fix.start  fix.end fix.duration fix.pos.x fix.pos.y fixation.index
## 100  21420172 21420306          134 1169.6689  410.4060              5
## 101  21420339 21420588          249 1013.9551  640.8259              6
## 102  21420688 21420789          101 1035.0666  556.8980              7
## 103  21424584 21424867          283  867.2221  165.6333              1
## 104  21424917 21425034          117  818.8656  421.9963              2
## 105  21425084 21425284          200  563.9520  449.9662              3
## 106  21425317 21425417          100  811.7601  418.8178              4
## 107  21425450 21425567          117  823.8944  410.7243              5
## 108  21425600 21425700          100  885.8485  409.5367              6
## 109  21429729 21429912          183  823.5517  162.2458              1
##     trial.index stimulus.id aoi.index aoi.line.index aoi.label participant.name
## 100           5           2        NA             NA        NA            Jones
## 101           5           2        NA             NA        NA            Jones
## 102           5           2        NA             NA        NA            Jones
## 103           6           3        NA             NA        NA            Jones
## 104           6           3        NA             NA        NA            Jones
## 105           6           3        NA             NA        NA            Jones
## 106           6           3        NA             NA        NA            Jones
## 107           6           3        NA             NA        NA            Jones
## 108           6           3        NA             NA        NA            Jones
## 109           7          10        NA             NA        NA            Jones
##     participant.nr
## 100              4
## 101              4
## 102              4
## 103              4
## 104              4
## 105              4
## 106              4
## 107              4
## 108              4
## 109              4

Note: somehow drawing AOIs doesnt work and the assigned AOIs dont show up in the fixation summary … :/